home *** CD-ROM | disk | FTP | other *** search
/ Virtual Valerie / Virtual Valerie.iso / Virtual VALERIE™ / Elevator / elevator / elevator.rsrc / STXT_1507 < prev    next >
Unknown  |  1990-02-24  |  628 b 

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text

This file was not able to be converted.
This format is not currently supported by dexvert.

ConfidenceProgramDetectionMatch TypeSupport
100% file data default
100% dexmagic Director STXT default



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 00 00 0c 00 00 02 52 | 00 00 00 16 2d 2d 0d 6d |.......R|....--.m|
|00000010| 61 63 72 6f 20 67 6f 66 | 6c 6f 6f 72 0d 63 75 72 |acro gof|loor.cur|
|00000020| 73 6f 72 20 2d 31 0d 67 | 6c 6f 62 61 6c 20 65 66 |sor -1.g|lobal ef|
|00000030| 6c 6f 6f 72 2c 20 73 65 | 62 75 74 2c 20 65 74 72 |loor, se|but, etr|
|00000040| 61 70 2c 20 65 77 68 65 | 72 65 0d 69 66 20 65 74 |ap, ewhe|re.if et|
|00000050| 72 61 70 20 74 68 65 6e | 0d 20 20 20 20 63 6c 6f |rap then|. clo|
|00000060| 73 65 64 6f 6f 72 73 0d | 20 20 20 20 65 78 69 74 |sedoors.| exit|
|00000070| 0d 65 6e 64 20 69 66 0d | 73 65 74 20 61 20 3d 20 |.end if.|set a = |
|00000080| 73 65 62 75 74 20 2d 20 | 74 68 65 20 63 6c 69 63 |sebut - |the clic|
|00000090| 6b 6f 6e 0d 69 66 20 65 | 66 6c 6f 6f 72 20 3d 20 |kon.if e|floor = |
|000000a0| 61 20 74 68 65 6e 20 72 | 65 74 75 72 6e 0d 67 65 |a then r|eturn.ge|
|000000b0| 74 66 6c 6f 6f 72 0d 73 | 65 74 20 74 68 65 20 63 |tfloor.s|et the c|
|000000c0| 61 73 74 6e 75 6d 20 6f | 66 20 73 70 72 69 74 65 |astnum o|f sprite|
|000000d0| 20 28 73 65 62 75 74 20 | 2d 20 61 29 20 3d 20 61 | (sebut |- a) = a|
|000000e0| 33 38 0d 64 69 0d 64 6f | 20 22 70 6c 61 79 20 66 |38.di.do| "play f|
|000000f0| 72 61 6d 65 20 22 26 71 | 75 6f 74 65 26 22 65 6c |rame "&q|uote&"el|
|00000100| 65 20 63 2e 22 26 65 77 | 68 65 72 65 26 71 75 6f |e c."&ew|here&quo|
|00000110| 74 65 0d 65 69 0d 77 61 | 69 74 28 34 30 29 0d 65 |te.ei.wa|it(40).e|
|00000120| 6c 65 6d 6f 76 65 20 61 | 0d 64 6f 20 22 67 6f 20 |lemove a|.do "go |
|00000130| 22 26 71 75 6f 74 65 26 | 22 69 6e 65 6c 65 20 6f |"&quote&|"inele o|
|00000140| 2e 22 26 65 77 68 65 72 | 65 26 71 75 6f 74 65 0d |."&ewher|e&quote.|
|00000150| 2d 2d 0d 6d 61 63 72 6f | 20 67 6f 66 6c 6f 6f 72 |--.macro| gofloor|
|00000160| 63 0d 67 6c 6f 62 61 6c | 20 65 66 6c 6f 6f 72 2c |c.global| efloor,|
|00000170| 20 73 65 62 75 74 2c 20 | 65 74 72 61 70 2c 20 65 | sebut, |etrap, e|
|00000180| 77 68 65 72 65 0d 69 66 | 20 65 74 72 61 70 20 74 |where.if| etrap t|
|00000190| 68 65 6e 0d 20 20 20 20 | 73 6e 64 28 32 30 2c 72 |hen. |snd(20,r|
|000001a0| 61 6e 64 6f 6d 28 34 29 | 2c 31 32 30 2c 38 30 2c |andom(4)|,120,80,|
|000001b0| 31 29 0d 20 20 20 20 65 | 78 69 74 0d 65 6e 64 20 |1). e|xit.end |
|000001c0| 69 66 0d 73 65 74 20 61 | 20 3d 20 73 65 62 75 74 |if.set a| = sebut|
|000001d0| 20 2d 20 74 68 65 20 63 | 6c 69 63 6b 6f 6e 0d 69 | - the c|lickon.i|
|000001e0| 66 20 65 66 6c 6f 6f 72 | 20 3d 20 61 20 74 68 65 |f efloor| = a the|
|000001f0| 6e 20 72 65 74 75 72 6e | 0d 67 65 74 66 6c 6f 6f |n return|.getfloo|
|00000200| 72 0d 73 65 74 20 74 68 | 65 20 63 61 73 74 6e 75 |r.set th|e castnu|
|00000210| 6d 20 6f 66 20 73 70 72 | 69 74 65 20 28 73 65 62 |m of spr|ite (seb|
|00000220| 75 74 20 2d 20 61 29 20 | 3d 20 61 33 38 0d 65 6c |ut - a) |= a38.el|
|00000230| 65 6d 6f 76 65 20 61 0d | 64 6f 20 22 67 6f 20 22 |emove a.|do "go "|
|00000240| 26 71 75 6f 74 65 26 22 | 69 6e 65 6c 65 20 6f 2e |&quote&"|inele o.|
|00000250| 22 26 65 77 68 65 72 65 | 26 71 75 6f 74 65 00 01 |"&ewhere|&quote..|
|00000260| 00 00 00 00 00 0b 00 09 | 00 04 00 00 00 09 00 00 |........|........|
|00000270| 00 00 00 00 | |.... | |
+--------+-------------------------+-------------------------+--------+--------+